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6400/6500/6600 SCOPE 

SCOPE 3.1.5 for the CONTROL DATA® 6400,6500, and 6600 
computers supervises the assembly, compilation, and execution 
of a wide variety of jobs. SCOPE scheduling increases job 
throughput. In addition to input/output functions, storage assign¬ 
ment, accounting, and operator communications, SCOPE provides 
these special features: 

Extended core storage allocation 

Random access on both 6603 and 6638 disks 

Usage of 854 disk pack and 865 drum as system devices 

Tape error recovery 

Extended character set 

Tape labeling and automatic reel switching 

Linking loader with segment and overlay capabilities 

Optimum use of input/output equipment and priority 
processing 

Implementation of file action macros and system action 
requests 

Operating environment information during program execution 

Minimized use of control points for system functions 

Job checkpoint/restart 

Multi-file reels and multi-reel files 

Debugging aids 


Library Programs 


COMPASS 
FORTRAN 
FORTRAN Extended 
COBOL 


SIMSCRIPT 
TTY Respond 
APT 

ALGOL-60 


EXPORT/IMPORT 

PERT/TIME 

SORT/MERGE 

OPTIMA 
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CONTROL STATEMENTS 

n, Tt, CMfl, ECb, Pp. 


Job Identification 


n 

t 

fl 

b 

P 

LOADER(name) 

name 

PPLOADR 

CPLOADR 

LOAD(lfn) 

Ifn 

EXE CUTE (name, p 
name 


Alphanumeric job name, 1-7 characters 
beginning with a letter 

Central processor time limit in seconds, 
l-77777 g 

Central memory field length, l-360000g 

Extended core storage 1000g-word blocks, 
i-77778 

Priority level, 1 < p < 2^ - 1, k £ 8 
according to installation option; 1 = lowest 
priority 


Loader Selection 


Name of loader 
Peripheral Processor Loader 
Central Processor Loader 


File Loading- 


Logical file name 

p ) Execution 

2 n 

Program entry point 
Program parameter forms: 

Pi, Pi = 0, pj = qj 

Pj and are 7-character strings 
is i £ 53 
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Program Call 


name,p 1 ,p 2 , ■ • • .P n 

Program entry point 
Program parameter forms: 

P i- P i = °’ P i =q i 
Pj and q^ are 7-character strings 
1 s i < 53 

Load Completion 

Load, print memory map, but do not 
execute. 


REQUEST,lfn,dt,dc,x,y,eq. Equipment Request 


lfn 

Alphanumeric logical file name beginning 
with a letter, 1-7 characters. 

dt 

Device type written as yxx where y = no, 
of devices and xx = equipment types. 


XX 

TYPES 


CP 

Card punch 


LP 

Line printer 


MT 

Mag. tape, 1/2" density depends 
on labeling 


LO 

Mag. tape, 1/2", 200 bpi 


HI 

Mag. tape, l/2", 556 bpi 


HY 

Mag. tape, 1/2", 800 bpi 


CR 

Card reader 


Dnnnn 

Mass storage unit, nnnn = FET 

dc 

& j, code 

File disposition‘code * 


PR 

Print 


PI 

Print on 501/505 


P2 

Print on 512 


PU 

Punch Hollerith 


PB 

Punch binary 


| 


name 

P. 
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X 

y 

eq 

COMMON, lfn. 
lfn 

RE LEASE, lfn. 
lfn 

SWITCH,n. 

Set switch n = 1 

MODE.n. 

n 


CK Checkpoint dump 

P8 Punch binary (full 80 columns) 

MF Multi-file tape 

Magnetic tape data format 

blank SCOPE standard 

X External, SCOPE 2. 0 compatible 

S Stranger tape 

Magnetic tape label format 

blank Unlabeled 
E or N SCOPE standard 

Equipment number 


Common File 

Alphanumeric logical file name, beginning 
with a letter, 1-7 characters 

Common File Release 

Alphanumeric logical file name, beginning 
with a letter, 1-7 characters 


Pseudo Sense Switch 
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Arithmetic Exit Mode 

Exit mode, set to 7 unless altered by this 
control statement: 

n = 0 Disable exit mode 

n = 1 Address out of range; reference 
outside established limits of 
central memory or extended 
core storage, or negative word 
count in an extended core storage 
communication. 
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n = 2 

Floating point arithmetic; 
infinite operand 


n = 3 

Address or operand out of range 


n = 4 

Floating point arithmetic, oper¬ 
and indefinite 

j 

n = 5 

Indefinite operand or address 
out of range 

I 

n = 6 

Indefinite operand or operand 
out of range 


n = 7 

Indefinite operand, operand out 
of range, or address out of 
range 

IS £ M j. • i f>-» 

COMMENT.comments ' J 


Dayfile Comments 

Remarks listed as comments on dayfile 

EXIT. 


Exit 

Process following control cards if job terminated abnormally 
except for compilation and assembly errors. 

EXIT(S) 



Process following control cards if job terminated abnormally. 

REDUCE. 


Reduce Field Length 

MAP(p) 


Map Control 

P 

Mapping specification 


ON Full map after loading 

OFF No map 

PART No entry addresses in map 






SEGMENTS AND OVERLAYS 


SEGZERO(sn,pn ,pn ,... .p^) First Segment 

SEGMENT(sn,pn ,pn p , . .. .pn^ Subsequent Segments 

SECTION(sname,pn 1 ,pn 9 ,... .P n n ) Section 




OVERLAY(fn, 1,1, Cnnnnnn) Overlay 

sn Relocatable segment name 

pn Relocatable section or subprogram names 

1 

sname Relocatable section name 

fn Absolute file name 

1 Primary level number (octal); 0 for first 

overlay 

12 Secondary level number (octal); 0 for first 

overlay 

Cnnnnnn Optional; begin loading nnnnnn words from 

the start of blank common 
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FILE UPDATING 


UPDATE (parameter list) 


UPDATE. 


Parameters may be absent, present, or (except F and Q) 
present and equal to a value; parameters may appear in any 
order. 


P = fname 

N = fname 

I = fname 

L = fname 

C = fname 

S = fname 

F 


Old program library; if omitted, OLDPL 
assumed 

New program library; if omitted, no new 
program library written 

File containing control cards; if omitted, 
UPDATE assumes INPUT 

Listable output file; if omitted, OUTPUT 
assumed 

Card images to be assembled on named file: 
if omitted, COMPILE assumed; if C = 0, 
no compile file written 

Source deck listing on named file; if omitted 
no file written 

Full assembly option; if omitted, only 
COMPILE and modifications listed 


Q Speed updating corrections , *COMPILE 

must include all routines to be modified; 
common deck modifications must be 
specified by user 


File Manipulation Cards 

♦REWIND fname 
♦SKIP fname, rent 
♦READ fname 
♦LABEL label name 
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Creation 


Assembly 


*DECIC dname 
♦COMDECK dname 
♦END 


Correction and Updating 

♦IDENT idnam 
♦PURGE idnam 
♦DELETE a.n 
♦DELETE a.n.b.m 
♦RESTORE a.n 
♦RESTORE a.n.b.m 
♦INSERT a.n 
♦YANK a 
♦/any comments 
♦ADDFILE fname, a.n 


♦COMPILE a,b,c.d 

♦DECK dname 
♦COMDECK dname 
♦WE OR n 
♦CALL dname 


a.b Alphanumeric identifiers 
n.m Card sequence numbers^ 


LABEL MACRO 

lfn LABEL fin, ed, ret, create, reel, mfn.pos 


lfn 

Logical file name 

fin 

File label name 

ed 

Edition number 

ret 

Retention cycle 

create 

Creation date 

reel 

Reel number 

mfn 

Multi-file name 

pos 

Position number 
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FET CREATION MACROS 

Sequential coded file 


It'll 

FILEC 

fwa,f, (WSA = addr w ,l w ), (OWN = eoi, err) 
LBL, DTY = dt, DSC = dc, UPR, EPR, 
UBC = ubc, MLR = mlrs 

Sequential binary file 


lfn 

FILEB 

fwa,f, (WSA = addr w ,l w ), (OWN = eoi,err; 
LBL, DTY = dt, DSC =dc, UPR, EPR. 
UBC = ubc, MLR = mlrs 

Random coded file 


lfn 

RFILEC 

fwa,f, (WSA = addr w ,I w ), (IND = addr*,l t ) 
(OWN = eoi,err), LBL, DTY = dt, 

DSC = dc, UPR, EPR 

Random binary file 
lfn RFILEB 

fwa,f, (WSA = addr w ,l w ), (IND = addr^) 
(OWN = eoi,err), LBL, DTY = dt, 

DSC = dc, UPR, EPR 

Required 

parameters 


lfn 


Logical file name 

fwa 


First word address of FET 

,.i f 


Number of words in FET 

Optional parameters: 


J:; dt 


Device type 

1 dc 


Disposition code 

1 addr 

| w 

First word address of working storage 

area 

1 ^ 


Number of words in working storage area 

addr. 


First word address of index buffer 

k 


Number of words in index buffer 

1 e°i 


End-of-information address for OWNCOD! 

routine 

1 err 


Error address for OWNCODE routine 
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LBL LABEL definition macro follows FILE 

macro 

UPR User processing of end-of-reel conditions 

EPR User processing of error conditions 

CHECKPOINT/RESTART OPERATIONS 

0 KP. Checkpoint Dump 

Save currently active files 

RE ST ART .name,#. Restart Checkpoint Dump 

RESTART,#,name. 

REST ART, name. 

RESTART,#. 

RESTART. 

name Name of dump file; CCCCCCC assumed if 

omitted 

# Checkpoint number for restart 
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FILE ACTION REQUESTS 


REQUEST par am 


Assign Equipment During Execution 


param 


First word address oi' two word parameter 
list: 


59 

27 

23 

17 

11 

0 

logical file name 

status 


pyqx 

dc- 

dt 


status 


pyqx 


000001 
bits 9-13 


Request completed 
22 Illegal function 
24^ FNT full 
25^ No equipment logically 
available 

26 g No equipment available 
30 g Duplicate file name 
31 Duplicate check file name 

O 


Used only when dt specified 1/2" mag. tape 

p=l External tape 

p=0 SCOPE 3.0 tape 

y=l Two tapes 

y=0 One tape 

q=l SCOPE file label 

q=0 Unlabeled 

x=l Existing file 

x=0 New file 
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clc File disposition code 


0000 

No special action 

0001 

Checkpoint file 

0002 

Multifile tape 

0003-7 

Reserved 

0010 

Punch coded output 

0011 

Reserved 

0012 

Punch binary output 

0013 

Reserved 

0014 

Punch 80 column binary output 

0015-37 

Reserved 

0040 

Printed output 

0041-1777 

Reserved 

2000-3777 

File being processed by RESPOND 

4000-5777 

File being processed by 
EXPORT/IMPORT 

6000-7777 

Reserved 


dt Device type 

Bits 11-6 5-0 

00 

AA 01 

00 

01 
02 
03 

104 

105 

t06 

07 
10 
11-77 


SCOPE selected 


6603-1 diskttt 

System default, same as 03 

Inner zone only 1 Alternate 
Outer zone only > sector half- 


Both zones ) track 

Both zones 1 Sequential 

Inner zone only > sector full- 
Outer zone only J tract 
CDC reserved 

Eight sector allocation (RESPON. 
CDC reserved 


t Codes are defined but supporting software is not provided by 
SCOPE. 

tt Codes 0701 and 4000-7777 require a device assigned by 
REQUEST card or function before file is opened, 
ttt 6603-1 disk is a basic 6603 with or without field option 10098 
(disk speedup) installed; 6603-11 is a 6603 with both field options 
10098 and 10124 (speedup augment) installed. 
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AB 

02 


6638 disk 



00 

System default, same as 03 



01 

Alternate sector halftrack 

i 


02 

CDC reserved 



03 

Same as 01 



04-07 

CDC reserved 

- 


10 

Eight sector allocation 
(RESPOND) 



11-77 

CDC reserved 

I t — 

03 


Data cell 

1 AC 

04 


6603-11 diski tt xx same as 

! 

05,06 


CDC reserved for 6603-1 

AP 

07 


3234/854 disk 



00 

System default, same as 03 



ft.toi 

Private pack, same as 03 



02 

CDC reserved 



03 

Alternate triplets of sectors, 
one track 



04-77 

CDC reserved 

— 

10,11 


CDC reserved 

AD 

12 


3637/865 drum 



00 

Standard allocation is 64 words 
per PRU (1 PRU = 3 sectors), 

2 PRU's per record block 



01-77 

Reserved for system 


13-17 


CDC reserved 

ttttAX 

20 


ECS 


21-27 


CDC reserved 


30-37 


Reserved for installations, mass 


storage only 

f Codes are defined but supporting software is not provided by 
SCOPE. 

^ Codes 0701 and 4000-7777 require a device assigned by 
!REQUEST card or function before file is opened. 

6603-1 disk is a basic 6603 with or without field option 10098 
(disk speedup) installed; 6603-11 is a 6603 with both field 
, °P t i° ns 10098 and 10124 (speedup augment) installed. 

' 1 r 'The Interim ECS system was developed by Graham Campbell, 
Kurt Fuchel, and Sidney Heller, of the Brookhaven National 
Laboratory, Upton, New York. Work pei’formed at Brook- 
haven National Laboratories is supported by the U.S. Atomic 
Energy Commission. 
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ttMT 40 


6Ox l/2-inch 7-track, magnetic 
tape 


(Right 6 bits in binary) 

xxxxOO HI density 556 bpi 
xxxxOl LO density 200 bpi 
xxxxlO HI density 800 bpi 
xxxxll CDC reserved 
xxOOxx Unlabeled 
xxOlxx SCOPE standard label 
(USASI) 

xxlOxx CDC reserved (optional 
label) 

xxllxx CDC reserved 
OOxxxx SCOPE standard data 
format 

Olxxxx X data format 
lOxxxx CDC reserved (S data 
format) 

llxxxx CDC reserved (L data 
format) 


_ 

41-43 

CDC reserved 

fTR 

44 

Paper tape reader 

tTP 

45 

Paper tape punch 

_ 

46-47 

Reserved for installations 

LP 

50 

501, 512, 505 line printer 

LI 

51 

501, 505 line printer 

L2 

52 

512 line printer 


53-55 

CDC reserved 

_ 

56-57 

Reserved for installations 

CR 

60 

405 card reader 

_ 

61-65 

CDC reserved 

_ 

66-67 

Reserved for installations 

CP 

70 

415 card punch 

DS 

71 

6612 keyboard/display console 

1'GC 

72 

252-2 graphic console 

tHC 

73 

253-2 hard copy recorder 

Tfm 

74 

254-2 microfilm recorder 

t PL 

75 

Plotter 

-- 

76-77 

Reserved for installations 


t Codes are defined but supporting software is not provided by 
SCOPE. 

ft Codes 0701 and 4000-7777 require a device assigned by 
REQUEST card or function before file is opened. 
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For the following requests, these definitions are applicable: 


lfn 

recall 

1 

OPEN lfn, x, re call 
x 

CLOSE lfn, x, recall 


CLOSER lfn,x,recall 


EVICT lfn,recall 
READ lfn, recall 
READSKP lfn, 1, recall 
RPHR lfn, recall 

READNS lfn,recall 


Logical file name 

If non-blank, control returns to calling- 
program after operation is completed; 
otherwise, control returns after accepting 
the request. 

If non-blank, information is skipped until 
an end-of-record with levelnumber a speci¬ 
fied level number is read; if absent, this 
field is set to zero. 

Ready File For Processing 

File operation: READ, WRITE, READNR, 
WRITE NR, A LTER, RE E L, 
REELNR 


Set File to Close 


File action: 

x is absent, set at beginning-of-information 
x = NR 
x = UNLOAD 

Terminate Processing/Control Labeling 
(magnetic tape only) 

x is absent, rewind 
x = NR 
x = UNLOAD 

Release File Mass Storage Space 
Read Into Circular Buffer 
Read Into Circular Buffer 
Read Single Physical Record 
1/2" magnetic tape only; no conversion 

Read Mass Storage Non-Stop 
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READ IN lfn,x 


Read 


Absent Deblock into working storage 
area 

/name/ Read record using name index 
logical record number 

Read record using name or 
number index 


WRITE lfn, recall 
WRITER lfn, 1, recall 
WRITEF, lfn, recall 


Write From Circular Buffer 
Write with Level Number 
Write with Logical End-of-File 


WPHR lfn, recall 

1/2" magnetic tape only 


Write Single Physical Record 


WRIT OUT lfn,x Write 

x Absent Block from working storage area 

/name/ Write using name index 
logical record number 

Write using name or number 
index 

REWRITE lfn, recall \ Rewrite Mass Storage 

REWRITER lfn, 1, recall/ Mass Rewrite with Level Number 

REWRITEF lfn, recall > Storage Rewrite with Logical End-of-File 
\ only 

WRITIN lfn, x ' Write-in-Place 


Working storage to buffer 
Working storage to named record 
Working storage to numbered record 

SKIPF lfn, n, 1, recall Bypass Logical Records-Forward 

n Number of logical records or record groups 

to be .skipped; if absent, 1 is assumed 

BKSP lfn, recall Bypass Logical Record-Reverse 


blank 

/name/ 

m 
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BKSPRU lfn,n, recall 


Bypass Physical Record Unit-Reverse 


n 


Number of PRUs to be bypassed; if absent, 
1 is assumed 


SKIPB lfn, n, 1, recall 


Bypass Logical Records-Reverse 


n 


1 


Number of logical records or record group 
to be skipped; if absent, 1 is assumed. 

Level number 


REWIND lfn, recall 


Rewind File 


UNLOAD lfn, recall 


Unload File 


SYSTEM ACTION REQUESTS 


For the following requests, this definition is applicable: 

recall If non-blank, control returns to calling 

program after operation is completed; 
otherwise, control returns after accepting 
the request 

MEMORY type, status,recall Obtain or Change Field Length 


type 

CM 

ECS 

status 


RECALL lfn 


Field length reference: 

0 

1 

Field length alteration: 

0 No alteration 

any number Alter field length to equal 
value of number 

Generate Calling Sequence 


lfn Base address of FET - job relinquishes 

central processor. When lfn is specified, 
control returns to program when I/O 
request is completed for that file; other¬ 
wise control returns next time around 
monitor loop 
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MESSAGE addr.x, recall Place Message in Dayfile 

addr Location where message is stored in dis¬ 

play code 

x x = 0, message displayed and entered into 

dayfile 

x / 0, message displayed but not entered 
into dayfile 

ENDRUN Terminate Run Normally 

Abort Terminate Job Abnormally 


TIME status,recall 
CLOCK status,recall 
DATE status,recall 
JDATE status,recall 
LOADER param 
param 


Time to Status 

Clock to Status 

Date to Status 

Julian Date to Status 

Request to Loader 

Location of user-established load sequence 
parameter list 


lfn 

si 


*2 

□ 

- 


u 

V 

m 

- 

i! 

- 

d 

lwa 

fwa 

59 

53 

47 


43 

41 

39 


37 


35 

17 0 


lfn File from which programs are loaded; 

entry point; subprogram name; or zero 

si Location of a list of sections or subpro¬ 

grams, or a segment 

1 Segment level if s / 0, v = 0, and Oils 

63; Primary overlay level if s = 0, v ^ 0 

1 Secondary level 

r Reset bit; if r i 0, loader tables cleared 
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p Partial map bit; if p ^ 0, on-line partial 

core map given 

u Library overlay flag; if u ^ 0, overlay loade 

from system library 

v Overlay flag; if v ^ 0, overlay load operatioi 

requested 

m NOMAP flag; if m ^ 0, maps of segment or 

overlay load suppressed 

k Search key; if k ^ 0, lfn is entry point 

name 

s Segment flag; if s ^ 0, segment loading- 

operation requested 

f Fill flag; if f ^ 0, unsatisfied external 

symbols filled with out-of-bounds refer¬ 
ences 

c Complete flag; if c ^ 0, load necessary 

subroutines from system library 

Iwa Last location, relative to RA, available 

for the loading operation; if lwa = 0, limit 
of program loading is first word of LOADEI 
tables 

fwa Initial location, relative to RA, at which to 

begin loading; if fwa = 0, loading occurs at 
next available location 


LOADREQ, param 


Overlay Request 



ji 


param 

Zero or blank Rewind file named in RA + 64 and load for 
execution 

Non-blank Location of user-established load sequence 

parameter list; same as for LOADER 
request. 
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LIBRARY PREPARATION AND MAINTENANCE 

Definitions for the following requests: 


s Source file 
d Destination file 
p Record name 
r Residence: DS, CM 
e Edition: 0-63 
n 1 £ n < 2 1 7-1; in SKIPE; 

n may be a name 
x Count 


EDITLEB. 


Call Statement 


System directory saved on common file 


EDITLIB (RE STORE) 


Alternate Call Statement 


System directory replaced by contents of common file 
MOVE(p, r) Change Record Residence 

DELETE(p) Delete Record from System Directory 


LIST(s) 


Write Out Directory 


READY (d) 


Prepare To Create System Library 


d = SYSTEM 
d = SYSTEM, * 
d ^ SYSTEM 


System directory manipulated 

Empty directory created 

Model of an empty directory and an empty 

scratch file prepared 


TRANSFER^, n,x) 


Copy System Records 


ADD(p, s, r, e) 


Add Record 


s ^ SYSTEM Pre-positioning of s necessary 

s = SYSTEM Pre-positioning unnecessary 

p may be single record name or: p^ - p^,p - * 

ADDBCD(p, s,r,e) Add Coded Record as Overlay 


ADDCOS(p, s, r, e) 


Add Record Without a Prefix 


ADDT EXT (p, s, r, e) 


Add Compile File From Update 


20 




DELETE (p) 


Delete Reeorc 


LENGTH (p) Request Field Lengtl 

COMPLETE. Complete File 


READY statement must precede COMPLETE statement. 


REWIND (s) 

Rewind File 

SKIPB(s.n) 

Backspace On File 

SKIPF(s.n) 

Skip Logical Records 

COPY (file!, file2) 

UTILITY FUNCTIONS 

Copy To End-of-Informatior 

COPYBF(filel,file2,n) 

Copy Binary File 

COPYCF(filel,file2,n) 

Copy Coded (BCD) File 

COPYSBF (filel, file2, n) 

Copy Shifted Binary File 

COPYBR (file 1, file 2, n) 

Copy Binary Re core 

CO PY CR (file 1, f ile2, n) 

Copy Coded Recorc 

COPYL(f ilel, f ile2, file3) 

Copy Library 

COPYN (p , out, in^, in 2 , . . . 

, in^) Copy Logical Records 

P 1 

Format 

REWIND(filel) 

SKIPF(filel,± n) 

SK3PR(filel,± n) 

WEOF(filel) 

0 Include id fields 

Nonzero Omit id fields 

n = number of records/files 
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Record Identification Card: P 1 *P 2 >P 3 

Name or number of beginning record 

p Last record to 

copy 

name 

Copy p 1 to p 2 

integer 

Number of records 

* 

Copy to end-of-file 

1 !j ** 

Copy to double end-of-file 

/ 

Copy to zero length record 

i jj 0 or blank 

Copy p x 

1 

1 P 3 Source file 


UN LOAD (file 1) 

Unload file 

REWIND(filel) 

Rewind file 

LBC. 

Begin loading binary corrections at 
reference address +100 

LBC, address. 

Begin loading at address 

LOC. 

Load octal corrections 

LOC, address. 

Clear from reference address to 
address before modifying 

LOC(address 1 , address 2 ) 

Clear from address^ to address 2 


before modifying 


Punch Binary 

PBC. 

Begin punching at reference address + 
100g; deck length in words specified by 
contents of RA + 117 

PBC, address. 

Punch from reference address to address 

PBC (address! , address,.,) 

Punch from address^ to address 9 
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WBR.n.rl. 


Write Binary Record 


Begin writing from reference address + 
10 °8 

n File label must be TAPEn,n=l-7 

rl Record length in words; if omitted 
length is taken from lower 18-bits 
of RA + 117 

O 

RBR,n. Read Binary Record 

Begin reading into RA + 100 g 
n File label must be TAPEn; n=l-7 

RFL.nfl. Request Field Length 

nfl New field length in words 

Compare File Records 

COMPARE (filel, file2, n, level, errors, records) 

File to be compared 
File to be compared 
Number of records in filel 
Minimum e-o-r level 

Number of discrepancies per record to 
list 

Number of counted records to be 
processed 


filel 

file2 

n 

level 

errors 

records 
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DEBUGGING AIDS 


TRACE, p 1 ,p 2 , . . . ,P n - 


Tracing 


d , d ,. .. , p Parameters 

1 1 A n 

ID = iiiiiii Optional alphanumeric identifier, 1-7 

characters 


Initial address 

IA = e 
IA = e + n . 

IA1 = e - n 

IAC = c 
IAC = c + n 

IAC1 = c - n 


e Entry point name 
c Labeled common block name 

n Octal integer s 777777 


Last address 

LA = e 
LA = e + n 

LAI = e - n 

LAC = c 
LAC = c + n 

LAC1= c -n 


Frequency 

•FI = n Trace from nth time IA encountered 

F2 = n Stop tracing nth time IA encountered 

F3 = n Trace every nth time IA encountered 

n = octal integer 


Register trigger 

TR=P,An,Bn, or Xn n= register number, 1-7 


Masking trigger 

TM = m,k ,k , ... ,k 
12 n 

m 5 or 10 digit octal mask 
k. Match key 
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Location trigger 

TL = e 
TL = e + n 

TL1 = e - n 

TLC = c 
TLC = c + n 

TLC1 = c - n 
TLB = b 


e Entry point name 

c Labeled common block name 

n Octal integer =£ 777777 

b nth location in blank common 


Register Dump 
RD 


Include register dump 


Storage location reference 

OL = e, i 
OL = e + n, i 

OL =e - n,i Write i words, is is 100 

OLC = c, i 
OLC = c + n, i 

OLC1 = c - n,i 
OLB = b,i 


Register designator 

OR = r, i r Register An, Bn,Xn; write i words 

beginning at address in r 

n = 0-7 


SNAP,p 1 ,p 2 ,. 

p l’ p 2--- 
ED = iiiiiii 


■ P 


n 


Snapshot Dump 


Parameters 

Optional alphanumeric identifiers, 1-7 
characters 
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Trap location 

IA = e 
IA = e + n 
’ IA = a 

IA = e - n 

IAC = c 
IAC = c + n 

IAC1 = c - n 


e Entry point name 

c Labeled common block name 

n Octal integer 

a Absolute address relative to RA 


First word address of dump area Last word address of dump area 


FWA = e 



LWA = e 

FWA = e + n 



LWA = e + n 

FWA = n 

FWA = a 



LWA1 = e - n 

FWA = e - n 



LWAC = c 

FWA1 = n 



LWAC1 = c - n 

FWAC = c 



LWAB = b 

FWAC = c + n 



LWA = n 

FWAC = n 



LWA = a 

FWAC1 = c - n 

FWA Cl - n 



LWA1 = n 

LWA = c + n 

LWA = n 

FWAB = b 



LWA Cl = n 


b 

bth location in blank common 

Interval between dumped words 


INT = n 

n 

Positive octal integer 


Dump format 

F code character 
■ Characters 
O Octal 

M Octal with mnemonic operation codes 
I Integer 

S Single precision floating point 
F I format if exponent zero; S otherwise 
D Double precision floating point 
C Display code 

R Before or after above characters for 
register dump 
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Frequency 
FI = n 
F2 = n 
F3 = n 


Dump nth time IA encountered 
Stop dump nth time IA encountered 
Dump every nth time IA encounterec 
n Octal integer 


Entry point 
UR =p,i' 1 , 


r 

n 


p User program entry point 
before dump taken 

r. Parameters 
1 

Post Mortem Dumps 


DMP. 


DMP, address. 


Exchange package and p-77 through 
p +77 

Reference address through param¬ 
eter address 


DMP(address , address ) Dump addressj^ through address 2 ; 

1 1 dump absolute address-^ through 

absolute address 2 if 4 in high ordei 
address position. 

DM PE CS (address 1 , address ^, f, lfn) 

Dump Extended Core Storage 

address , address Dump from closest multiple of 

1 10g greater than or equal to 

address-^ to closest multiple of 
10g greater than address 2 


f Print format per line 

0 or 1 4 words in octal and display code 

2 2 words in octal parcels/display 

3 2 word octal bytes/display code 

4 2 words octal/display code 

lfn Dumpfile; OUTPUT assumed if omitted 
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DEBUG (p) 


Debug Control Card 





p Dump 

C Labeled dump followed by a change dump when DMP 
encountered 

T Load TRACE and SNAP with (0,0) overlay; load 
TRACE with SEGZERO with segment mode 

S Load TRACE and SNAP with (0,0) overlay; load 

SNAP with SEGZERO in segment mode 
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FORTRAN COMPILE AND PUNCH 



source statements 


PROGRAM BOB (INPUT, OUTPUT, TAPE1) 


9 /RUN(P) 


/ RAG600.T100, CM45000, EC40, P7. 
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'PROGRAM OVA (INPUT, OUTPUT) 


JOB456, T500, CM50000, KC30.P3. 































COMPASS SOURCE DECKS 


Peripherd 

Processor ✓^entpFcode.iooob 

Program f 


Central 

Processor 

Program 


Absolute 
Central Processor 
Program 


rnrce statements 
















■ 1 > )t y\ 


COMPASS source statements 


COMPASS. 


JOB,X6,T100, CM45000. 
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COMPASS ASSEMBLY AND 
FORTRAN COMPILATION 



9 / _L 

/^COMPILE COMP 
- / CORRECTIONS TO COMP 
AlDENT COR1 


l 


l 


L 


RUN(S, ,, COMPIL) 


COMPASS (I=ASSFMBL) 


UPDATE(Q, P=OPL, CCOMPIL) 


UPDATE(Q, P=OPL, C=ASSEMBL) 


REQUEST OPL. 


'LBI, CM55000, T1000. 
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TRACE RUN 



. ^ , J 


COMPASS source deck 


COPY C F (SNA CE, OUTPUT) 


REWIND (SNA CE) 


TRACE (parameters) 
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TRACE RUN 


'COMPASS source deck 


'COPYCR(SNACE, OUTPUT) 


'REWIND (SNA CE) 


SN A P (par am et er s) 


SNAP(parameters) 


' TRA C E (par am eter s) 


'TRACE (parameters) 


RMN, CM55000, T1000. 










W : iS 






Generate 
overlays 
on FILE 
LOADA and 
execute 
OVERLAY 0,0 


brujn, decks 


OVERLAY, LOADA, 0,0 


JOB123, T600, CM40000, EC20, P7 
























NOTES 











